home *** CD-ROM | disk | FTP | other *** search
/ Aminet 34 / Aminet 34 (2000)(Schatztruhe)[!][Dec 1999].iso / Aminet / misc / emu / Electrostatic.lha / Electrostatic / hidden / Riot.i < prev    next >
Text File  |  1999-09-06  |  2KB  |  155 lines
  1. ; File: Riot.i
  2. ; Author: Neil Cafferkey
  3. ; ======================
  4. ; These are replacements for instructions that access the Riot chip
  5. ;
  6. ; $VER: Riot.i 2.1 (25.8.99)
  7. ;
  8.  
  9.     ifnd    riot_i
  10. riot_i    set    1
  11.  
  12.  
  13. SWCHA    equ    $280
  14. SWCHB    equ    $282
  15.  
  16.  
  17. ; Macro: WSWCHA
  18. ; =============
  19. ;
  20.  
  21.     macro    WSWCHA
  22.  
  23.     addq.l    #4,CLOCK
  24.  
  25.     endm
  26.  
  27.  
  28. ; Macro: SWACNT
  29. ; =============
  30. ;
  31.  
  32.     macro    SWACNT
  33.  
  34.     addq.l    #4,CLOCK
  35.  
  36.     endm
  37.  
  38.  
  39. ; Macro: SWBCNT
  40. ; =============
  41. ;
  42.  
  43.     macro    SWBCNT
  44.  
  45.     addq.l    #4,CLOCK
  46.  
  47.     endm
  48.  
  49.  
  50. ; Macro: INTIM
  51. ; ============
  52. ;
  53.  
  54.     macro    INTIM
  55.  
  56.     ; Update clock cycle counter
  57.  
  58.     addq.l    #4,CLOCK
  59.  
  60.     ; Call library function corresponding to this macro
  61.  
  62.     move.l    CLOCK,d1
  63.     movea.l    ENV,a1
  64.     CALLSYS    A2600_InTim
  65.  
  66.     ; Store result
  67.  
  68.     move.b    d0,\1
  69.  
  70.     endm
  71.  
  72.  
  73. ; Macro: TIM1T
  74. ; ============
  75. ;
  76.  
  77.     macro    TIM1T
  78.  
  79.     ; Update clock cycle counter
  80.  
  81.     addq.l    #4,CLOCK
  82.  
  83.     ; Call library function corresponding to this macro
  84.  
  85.     move.l    \1,d0
  86.     move.l    CLOCK,d1
  87.     movea.l    ENV,a1
  88.     CALLSYS    A2600_Tim1T
  89.  
  90.     endm
  91.  
  92.  
  93. ; Macro: TIM8T
  94. ; ============
  95. ;
  96.  
  97.     macro    TIM8T
  98.  
  99.     ; Update clock cycle counter
  100.  
  101.     addq.l    #4,CLOCK
  102.  
  103.     ; Call library function corresponding to this macro
  104.  
  105.     move.l    \1,d0
  106.     move.l    CLOCK,d1
  107.     movea.l    ENV,a1
  108.     CALLSYS    A2600_Tim8T
  109.  
  110.     endm
  111.  
  112.  
  113. ; Macro: TIM64T
  114. ; =============
  115. ;
  116.  
  117.     macro    TIM64T
  118.  
  119.     ; Update clock cycle counter
  120.  
  121.     addq.l    #4,CLOCK
  122.  
  123.     ; Call library function corresponding to this macro
  124.  
  125.     move.l    \1,d0
  126.     move.l    CLOCK,d1
  127.     movea.l    ENV,a1
  128.     CALLSYS    A2600_Tim64T
  129.  
  130.     endm
  131.  
  132.  
  133. ; Macro: T1024T
  134. ; =============
  135. ;
  136.  
  137.     macro    T1024T
  138.  
  139.     ; Update clock cycle counter
  140.  
  141.     addq.l    #4,CLOCK
  142.  
  143.     ; Call library function corresponding to this macro
  144.  
  145.     move.l    \1,d0
  146.     move.l    CLOCK,d1
  147.     movea.l    ENV,a1
  148.     CALLSYS    A2600_Tim1024T
  149.  
  150.     endm
  151.  
  152.  
  153.     endc
  154.  
  155.